Public Class ECursada
    Private mdia As String
    Private mhorainicio As String
    Private mhorafinal As String
    Private mmodulo As Integer
    Private mestado As Integer

    Public Property dia() As String
        Get
            Return mdia
        End Get
        Set(ByVal value As String)
            mdia = value
        End Set
    End Property

    Public Property horainicio() As String

        Get
            Return mhorainicio
        End Get
        Set(ByVal value As String)
            mhorainicio = value
        End Set
    End Property

    Public Property horafinal() As String
        Get
            Return mhorafinal
        End Get
        Set(ByVal value As String)
            mhorafinal = value
        End Set
    End Property

    Public Property modulo() As Integer
        Get
            Return mmodulo
        End Get
        Set(ByVal value As Int32)
            mmodulo = value
        End Set
    End Property

    Public Property estado() As Integer
        Get
            Return mestado
        End Get
        Set(ByVal value As Integer)
            mestado = value
        End Set
    End Property

#Region "metodos publicos"

    'inicializa la entidad a los valeres por defecto
    Public Sub New()
        'masignatura = 0
        'mdocente = 0
        mdia = ""
        mhorainicio = "00:00 Hs"
        mhorafinal = "00:00 Hs"
        mestado = 0
    End Sub

#End Region

End Class
